﻿Public Class DocGiaNguoiLon
    Inherits DocGia

    Private _CMND As String
    Public Property CMND() As String
        Get
            Return _CMND
        End Get
        Set(ByVal value As String)
            _CMND = value
        End Set
    End Property
    Public Overrides Sub Nhap()
        MyBase.Nhap()
        Console.Write("Nhap CMND: ")
        _CMND = Console.ReadLine

    End Sub
    Public Overrides Sub Xuat()
        MyBase.Xuat()
        Console.WriteLine(", CMND: {0}", _CMND)
        Console.WriteLine("Doc Gia Nguoi Lon")

    End Sub
    Public Overrides Function TinhTien() As Double
        Return MyBase.TinhTien() * 10000
    End Function
End Class
